home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / CLPMOUSE.ARJ / DEMO2.PRG < prev    next >
Text File  |  1991-06-17  |  349b  |  19 lines
  1.  
  2. /* link this module with menuto.prg, CLPWIN52.LIB and MS_MOUSE.LIB */
  3.  
  4. setcursor(0)
  5. ms_on()
  6. wininit("WINFIL.WIN",.f.)
  7. setcolor("Y/B")
  8. winback(chr(177))
  9. winopen(10,10,5,15,.f.)
  10. MMENUTO(0)
  11. MPROMPT("1. ITEM 1")
  12. MPROMPT("2. ITEM 2")
  13. MPROMPT("3. ITEM 3")
  14. MPROMPT("4. ITEM 4")
  15. MMENUTO(1, "W/R")
  16. winclose(wintotal())
  17. windone()
  18. ms_off()
  19.